home *** CD-ROM | disk | FTP | other *** search
/ Komputer for Alle 1999 #8 / 1999 CD 8 (black).iso / maskdemo / DATA1.CAB / Program_Executable_Files / Daventry / KQ / WIZARD.CS < prev    next >
Encoding:
Text File  |  1998-12-15  |  11.3 KB  |  398 lines
  1. echo Wizard $1 $2 $3 $4 $5 $6 $7
  2. if test $2 == Init
  3. #  set Daventry::Wizard::metConnor 1
  4. #  set Daventry::ShadowMonster::metConnor 2
  5. #  set Daventry::Wizard::hasRing   false
  6. #  set Daventry::Wizard::hasTorch  false
  7. #  set Daventry::Wizard::hasCandle false
  8.  
  9.  
  10. else if test $2 == ConnorAction
  11.     echo Connor did a do
  12.     set Daventry::Wizard::Clicked true
  13.  
  14.     ########### C O N V E R S A T I O N   B O X   S T U F F ###############
  15.     if test $4 == TooFar
  16.         KQMonster::speak $1 $1 1000 4 14 32 1 1
  17.  
  18.     else if test $4 == Special
  19.         KQMonster::speak $1 $1 1000 4 0 64 1 1
  20.         
  21.     ########## H O W   M A N Y   T I M E S   M U S T   I   T E L L   Y O U #############
  22.     else if test $4 == do
  23.         if test "$Daventry::Wizard::metConnor" == 0
  24.             echo Met = 0
  25.             echo Connor meets Wizard for first time
  26.             KQConner::conversation $1 1000 4 14 27 1 13 0
  27.             set Daventry::Raven::ConnorHouse done
  28.  
  29.         else if test "$Daventry::Wizard::metConnor" == 1
  30.             echo Met = 1
  31.             if test "$Daventry::ShadowMonster::metConnor" > 0
  32.                 echo Connor gets spell list
  33.                 KQConner::conversation $1 1000 4 14 30 1 0 0
  34.             else
  35.                 echo Connor comes back to Wizard before meeting Shadow Monster
  36.                 KQConner::conversation $1 1000 4 14 29 1 0 0
  37.             endif    
  38.  
  39.         else if test "$Daventry::Wizard::metConnor" == 2
  40.             echo met = 2
  41.             KQConner::conversation $1 1000 4 14 28 1 1 0
  42.  
  43.         else
  44.             echo Connor greets Wizard after quest
  45.             echo $1
  46.             KQConner::conversation $1 1000 4 14 26 1 0 0
  47.         endif
  48.         endif
  49.         endif
  50.  
  51.     else if test $4 == INVITEM_RingOfDeadHero
  52.         if test "$Daventry::Wizard::metConnor" == 2
  53.             echo Clear speak
  54.             KQMonster::clearSpeak Wizard
  55.             handsOff 1
  56.  
  57.             deleteObject $3
  58.             set Daventry::Wizard::hasRing true
  59.             KQConner::conversation $1 1000 4 2 15 1 2 0
  60.  
  61.         else
  62.             KQConner::conversation $1 1000 4 2 96 1 0 0
  63.         endif    
  64.  
  65.     else if test $4 == INVITEM_Candle
  66.         if test "$Daventry::Wizard::metConnor" == 2
  67.             echo Clear speak
  68.             KQMonster::clearSpeak Wizard
  69.             handsOff 1
  70.  
  71.             deleteObject $3
  72.             set Daventry::Wizard::hasCandle true
  73.             KQConner::conversation $1 1000 4 1 5 1 2 0
  74.  
  75.         else
  76.             KQConner::conversation $1 1000 4 1 96 1 0 0
  77.         endif    
  78.  
  79.     else if test $4 == INVITEM_Ashes
  80.         if test "$Daventry::Wizard::metConnor" == 2
  81.             echo Clear speak
  82.             KQMonster::clearSpeak Wizard
  83.             handsOff 1
  84.  
  85.             deleteObject $3
  86.             set Daventry::Wizard::hasTorch true
  87.             KQConner::conversation $1 1000 4 3 25 1 2 0
  88.         else
  89.             KQConner::conversation $1 1000 4 3 96 1 0 0
  90.  
  91.         endif    
  92.     
  93.     else if test $4 == INVITEM_DarkPyramid
  94.         KQConner::conversation $1 1000 4 43 80 1 0 0
  95.  
  96.     else if test $4 == INVITEM_RingOfLight
  97.         KQConner::conversation $1 1000 4 45 82 1 0 0
  98.  
  99.     else if test $4 == INVITEM_SpellPage
  100.         KQConner::conversation $1 1000 4 47 84 1 0 0
  101.  
  102.     else if test $4 == INVITEM_Piece1
  103.         KQConner::conversation $1 1000 4 30 81 1 0 0
  104.  
  105.     else if test $4 == INVITEM_Piece2
  106.         KQConner::conversation $1 1000 4 30 81 1 0 0
  107.  
  108.     else if test $4 == INVITEM_Piece3
  109.         KQConner::conversation $1 1000 4 30 81 1 0 0
  110.  
  111.     else if test $4 == INVITEM_Piece4
  112.         KQConner::conversation $1 1000 4 30 81 1 0 0
  113.  
  114.     else if test $4 == INVITEM_Piece5
  115.         KQConner::conversation $1 1000 4 30 81 1 0 0
  116.  
  117.     else if test $4 == INVITEM_UniHorn
  118.         KQConner::conversation $1 1000 4 48 85 1 0 0
  119.  
  120.     else if test $4 == INVITEM_SilverCoins
  121.         KQConner::conversation $1 1000 4 8 86 1 0 0
  122.  
  123.     else if test $4 == INVITEM_LadyBell
  124.         KQConner::conversation $1 1000 4 38 79 1 0 0
  125.  
  126.     else    # Any Inventory Item
  127.         KQConner::conversation $1 1000 4 49 88 1 0 0
  128.  
  129.     endif
  130.     endif
  131.     endif
  132.     endif
  133.     endif
  134.     endif
  135.     endif
  136.     endif
  137.     endif
  138.     endif
  139.     endif    
  140.     endif
  141.     endif    
  142.     endif
  143.     endif
  144.     endif
  145.     endif
  146.  
  147. else if test $2 == TalkComplete
  148.     echo finished speaking $3 $4 $5 $6 $7
  149.     
  150.     if eval KQMonster::testMessage $3 $4 $5 $6 $7 1000 4 14 32 1
  151.         # respond to "hey, wizard!" from far away
  152.         KQMonster::speak $1 $1 1000 4 14 32 2 2
  153.     else if eval KQMonster::testMessage $3 $4 $5 $6 $7 1000 4 14 27 8
  154.         give Mask1
  155.         give Piece1
  156.         set PieceName noname
  157.         KQMonster::checkInventory Connor Piece1A PieceName
  158.         deleteObject $PieceName
  159.     else if eval KQMonster::testMessage $3 $4 $5 $6 $7 1000 4 14 27 12    
  160.         handsOff 1
  161.  
  162.     else if eval KQMonster::testMessage $3 $4 $5 $6 $7 1000 4 14 27 13
  163.         # hello there...to -> getting the map...
  164.         setThirdPerson
  165.  
  166.         preloadResource wizmap1.kqs
  167.         preloadResource wizmap2.kqs
  168.         preloadResource wizmap3.kqs
  169.         preloadResource wizmap4.kqs
  170.         preloadResource wizmap5.kqs
  171.         preloadResource Map1.kqs
  172.         preloadResource Map3.kqs
  173.         preloadResource Map4.kqs
  174.         preloadResource Map5.kqs
  175.  
  176.         KQCamera::follow none
  177.         move KQCamera 0 192028 198106 7780 0 0 1.225
  178.         move Connor 0 193229 198323 -1 0 0 -1.57
  179.         loadKQ magicmap.kq
  180.         sendEvent 0 magicmap KQAnimPlayEvent Map1
  181. #        KQSound::play mm03a.aud
  182.         sendEvent 0 $1 KQAnimPlayEvent wizmap1
  183. #        KQSound::play mm03b.aud
  184.         getEndLoop $1 $1 1
  185.         set Daventry::Wizard::metConnor 1
  186.  
  187.     else if eval KQMonster::testMessage $3 $4 $5 $6 $7 1000 4 14 30 5
  188.         sendEvent 0 Connor KQStatsChangeRequestEvent 0 0 0 0 25
  189.         set Daventry::Wizard::metConnor 2
  190.  
  191.     else if eval KQMonster::testMessage $3 $4 $5 $6 $7 1000 4 0 17 2
  192.         # congrats, here's the magic ring...
  193.         #mouseAction 0 0 480 0
  194.         #handsOff 1
  195.  
  196.         # DO NOT REMOVE this setThirdPerson! -jeffo
  197.         setThirdPerson
  198.         KQCamera::follow none
  199.         getEndLoop Connor Wizard 1
  200. echo BEFFORE
  201.         KQMonster::setState Connor Special 'AnimList=wizard.anm,AnimListOn,castring1'
  202. echo AFTER
  203. #        move Wizard 2 100 100 -1 0 0 0
  204.         makeTranslucent $1 150
  205.         move Wizard 0 192420 197853 6630 0 0 -1.57
  206.         sendEvent 0 $1 KQAnimPlayEvent ringspl1
  207.         move Connor   0 192420 197853 6630 0 0 -1.57
  208.         move KQCamera 0 191655 196669 8000 0 0 .5
  209.  
  210.     else if eval KQMonster::testMessage $3 $4 $5 $6 $7 1000 4 0 17 3
  211.         handsOff 0
  212.  
  213.     else if eval KQMonster::testMessage $3 $4 $5 $6 $7 1000 4 0 40 1
  214.         KQConner::conversation $1 1000 4 14 28 3 3 0
  215.     else if eval KQMonster::testMessage $3 $4 $5 $6 $7 1000 4 0 41 1
  216.         KQConner::conversation $1 1000 4 14 28 3 3 0
  217.     else if eval KQMonster::testMessage $3 $4 $5 $6 $7 1000 4 0 42 1
  218.         KQConner::conversation $1 1000 4 14 28 3 3 0
  219.     else if eval KQMonster::testMessage $3 $4 $5 $6 $7 1000 4 0 43 1
  220.         KQConner::conversation $1 1000 4 14 28 3 3 0
  221.     else if eval KQMonster::testMessage $3 $4 $5 $6 $7 1000 4 0 44 1
  222.         KQConner::conversation $1 1000 4 14 28 3 3 0
  223.     else if eval KQMonster::testMessage $3 $4 $5 $6 $7 1000 4 0 45 1
  224.         KQConner::conversation $1 1000 4 14 28 3 3 0
  225.     else
  226.         set Daventry::Wizard::isListRemaining false
  227.         if eval KQMonster::testMessage $3 $4 $5 $6 $7 1000 4 14 28 1
  228. #            set Daventry::Wizard::isListRemaining true
  229.             if test "$Daventry::Wizard::hasCandle" == true
  230.                 if test "$Daventry::Wizard::hasRing" == true
  231.                     if test "$Daventry::Wizard::hasTorch" == true
  232.                         preloadResource wizseq1.KQS
  233.                         preloadResource wizseq2.KQS
  234.                         preloadResource wizseq3.KQS
  235.                         preloadResource wizseq4.KQS
  236.                         preloadResource wizsp1.KQS
  237.                         preloadResource wizsp2.KQS
  238.                         preloadResource wizsp3.KQS
  239. echo BEFORE SET THIRD
  240.                         setThirdPerson
  241. echo AFTER SET THIRD
  242.                         handsOff 1
  243.                          KQConner::conversation $1 1000 4 0 17 1 2 0
  244.                     else
  245.                         KQConner::conversation $1 1000 4 0 41 1 0 0
  246.                     endif
  247.                 else if test "$Daventry::Wizard::hasTorch" == true
  248.                     KQConner::conversation $1 1000 4 0 42 1 0 0
  249.                 else
  250.                     KQConner::conversation $1 1000 4 0 40 1 0 0
  251.                 endif
  252.                 endif
  253.             else if test "$Daventry::Wizard::hasRing" == true
  254.                 if test "$Daventry::Wizard::hasTorch" == true
  255.                     KQConner::conversation $1 1000 4 0 44 1 1 0
  256.                 else
  257.                     KQConner::conversation $1 1000 4 0 43 1 1 0
  258.                 endif    
  259.             else if test "$Daventry::Wizard::hasTorch" == true
  260.                 KQConner::conversation $1 1000 4 0 45 1 1 0
  261.             else
  262.                 # play to end in this case
  263.                 KQConner::conversation $1 1000 4 14 28 2 0 0
  264.             endif
  265.             endif
  266.             endif
  267.         else if eval KQMonster::testMessage $3 $4 $5 $6 $7 1000 4 1 5 2
  268.             set Daventry::Wizard::isListRemaining true
  269.             handsOff 0
  270.  
  271.         else if eval KQMonster::testMessage $3 $4 $5 $6 $7 1000 4 2 15 2
  272.             set Daventry::Wizard::isListRemaining true
  273.             handsOff 0
  274.  
  275.         else if eval KQMonster::testMessage $3 $4 $5 $6 $7 1000 4 3 25 2
  276.             set Daventry::Wizard::isListRemaining true
  277.             handsOff 0
  278.  
  279.         endif
  280.         endif
  281.         endif
  282.         endif
  283.     
  284.         if test $Daventry::Wizard::isListRemaining == true
  285.             if test "$Daventry::Wizard::hasCandle" == true
  286.                 if test "$Daventry::Wizard::hasRing" == true
  287.                     if test "$Daventry::Wizard::hasTorch" == true
  288.                           preloadResource wizseq1.KQS
  289.                           preloadResource wizseq2.KQS
  290.                           preloadResource wizseq3.KQS
  291.                           preloadResource wizseq4.KQS
  292.                           preloadResource wizsp1.KQS
  293.                           preloadResource wizsp2.KQS
  294.                           preloadResource wizsp3.KQS
  295.                           setThirdPerson
  296.                           handsOff 1
  297.                           KQConner::conversation $1 1000 4 0 17 1 2 0
  298.                        endif
  299.                 endif
  300.              endif
  301.         endif    
  302.     endif
  303.     endif
  304.     endif
  305.     endif
  306.     endif
  307.     endif    
  308.     endif    
  309.     endif
  310.     endif
  311.     endif
  312.     endif
  313.     endif
  314.     endif
  315. else if test $2 == Cue
  316.     if test $3 == 300
  317.         if test $5 == castring1
  318.             move KQCamera 0 192035 193685 8000 0 0 0
  319.             KQMonster::setState Connor Special 'AnimList=wizard.anm,AnimListOn,castring2'
  320.             sendEvent 0 $1 KQAnimPlayEvent ringspl2
  321.         else if test $5 == castring2
  322.             move KQCamera 0 191496 197406 8000 0 0 -1.4
  323.             KQMonster::setState Connor Special 'AnimList=wizard.anm,AnimListOn,castring3'
  324.             sendEvent 0 $1 KQAnimPlayEvent ringspl3
  325.         else if test $5 == castring3
  326.             move KQCamera 0 193936 193406 8000 0 0 .2
  327.             KQMonster::setState Connor Special 'AnimList=wizard.anm,AnimListOn,castring4'
  328.         else if test $5 == castring4
  329.             getEndLoop Connor $1 0
  330.             give RingOfLight
  331.             sendEvent 0 Connor KQStatsChangeRequestEvent 0 0 0 0 50
  332.             deleteObject Knight
  333.             set Daventry::Wizard::metConnor 3
  334.             #sendEvent 0 $1 KQAnimPlayEvent stop
  335.             move Wizard 0 190807 198274 -1 0 0 -1.57
  336.             setThirdPerson
  337.             KQCamera::follow Connor
  338.             KQConner::conversation $1 1000 4 0 17 3 3 0
  339.  
  340.         # Magic Map Sequence
  341.         else if test $5 == wizmap1
  342.             move KQCamera 0 192485 197796 8030 0 0 -.95
  343.             KQMonster::setState Connor Special 'AnimList=magicmap.anm,AnimListOn,wizmap2'
  344.             getEndLoop Connor Wizard 1
  345.             echo End wizmap 1
  346.  
  347.         else if test $5 == wizmap2
  348.             echo End wizmap 2
  349.             move KQCamera 0 192428 198506 7630 0 0 1.435
  350.             sendEvent 0 $1 KQAnimPlayEvent wizmap3
  351.             sendEvent 0 magicmap KQAnimPlayEvent Map3
  352.  
  353.         else if test $5 == wizmap3
  354.             move KQCamera 0 192838 196861 8100 -.165 0 0
  355.             sendEvent 0 $1 KQAnimPlayEvent stop
  356.             KQMonster::setState Connor Special 'AnimList=magicmap.anm,AnimListOn,wizmap4,wizmap5'
  357.             sendEvent 0 magicmap KQAnimPlayEvent Map4
  358.             echo End wizmap 3
  359.  
  360.         else if test $5 == wizmap4
  361.             move KQCamera 0 192285 197796 8030 0 0 -1.13
  362.             sendEvent 0 magicmap KQAnimPlayEvent Map5
  363.             give MagicMap
  364.             sendEvent 0 Connor KQStatsChangeRequestEvent 0 0 0 0 15
  365.             echo End wizmap 4
  366.  
  367.         else if test $5 == wizmap5
  368.             echo End wizmap 5
  369.             KQCamera::follow Connor
  370.             handsOff 0
  371.             setThirdPerson
  372.             deleteObject magicmap
  373.             getEndLoop Connor Wizard 0
  374.             getEndLoop $1 $1 0
  375.             KQConner::conversation $1 1000 4 14 27 14 14 0
  376.             doPopup 153
  377.  
  378.         endif
  379.         endif
  380.         endif
  381.         endif
  382.         endif
  383.         endif
  384.         endif
  385.         endif
  386.         endif
  387.     endif
  388. else if test $2 == EndLoop
  389.     if test $3 == ringspl3
  390.         move Wizard 0 183807 198274 -1 0 0 -1.57
  391.         makeTranslucent $1 256
  392.     endif
  393. endif
  394. endif
  395. endif
  396. endif
  397. endif    
  398.